home *** CD-ROM | disk | FTP | other *** search
/ Erect Magazine Special 4 / Erect Magazine Special 4 - Disc 1.iso / mac / P_Bro.DIR / 00027.ls < prev    next >
Encoding:
Text File  |  1996-11-01  |  353 b   |  12 lines
  1. on mouseDown
  2.   set the visible of sprite (the clickOn + 5) to 1
  3.   set the visible of sprite (the clickOn + 5 - 1) to 0
  4.   updateStage()
  5.   set tempcur to integer(field "PhotoCUR_T") + 1
  6.   if tempcur > integer(item integer(field "PhotoGRP_T") of field "PhotoMAX_T") then
  7.     set tempcur to 1
  8.   end if
  9.   put tempcur into field "PhotoCUR_T"
  10.   go("Disp")
  11. end
  12.